object Form06: TForm06 Left = 139 Top = 203 Width = 605 Height = 466 ActiveControl = Panel1 Caption = 'Form06' Font.Color = clBlack Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 120 Position = poScreenCenter OnCreate = FormCreate TextHeight = 16 object Panel1: TPanel Left = 0 Top = 0 Width = 597 Height = 41 Align = alTop TabOrder = 0 object DBNavigator: TDBNavigator Left = 10 Top = 6 Width = 291 Height = 31 DataSource = DataSource1 Ctl3D = False ParentCtl3D = False TabOrder = 0 end object View: TBitBtn Left = 404 Top = 4 Width = 89 Height = 33 Caption = '&View' TabOrder = 1 OnClick = ViewClick end object Exit: TBitBtn Left = 500 Top = 4 Width = 89 Height = 33 Caption = '&Exit' ModalResult = 2 TabOrder = 2 OnClick = ExitClick end end object Panel2: TPanel Left = 0 Top = 41 Width = 597 Height = 398 Align = alClient BevelInner = bvLowered BorderWidth = 4 Caption = 'Panel2' TabOrder = 1 object ScrollBox: TScrollBox Left = 6 Top = 6 Width = 585 Height = 386 HorzScrollBar.Margin = 6 HorzScrollBar.Range = 310 VertScrollBar.Margin = 6 VertScrollBar.Range = 186 Align = alClient AutoScroll = False TabOrder = 0 object Label1: TLabel Left = 8 Top = 6 Width = 67 Height = 16 Caption = 'Species No' FocusControl = EditSpeciesNo Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 91 Top = 6 Width = 52 Height = 16 Caption = 'Category' FocusControl = EditCategory Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 8 Top = 50 Width = 93 Height = 16 Caption = 'Common_Name' FocusControl = EditCommon_Name Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label4: TLabel Left = 8 Top = 94 Width = 85 Height = 16 Caption = 'Species Name' FocusControl = EditSpeciesName Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label5: TLabel Left = 8 Top = 138 Width = 69 Height = 16 Caption = 'Length (cm)' FocusControl = EditLengthcm Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label6: TLabel Left = 90 Top = 138 Width = 56 Height = 16 Caption = 'Length_In' FocusControl = EditLength_In Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object EditSpeciesNo: TDBEdit Left = 8 Top = 24 Width = 70 Height = 24 Color = clSilver DataField = 'Species No' DataSource = DataSource1 Font.Color = clWhite Font.Height = -13 Font.Name = 'Arial' Font.Style = [] MaxLength = 0 ParentFont = False TabOrder = 0 end object EditCategory: TDBEdit Left = 91 Top = 24 Width = 105 Height = 24 Color = clSilver DataField = 'Category' DataSource = DataSource1 Font.Color = clWhite Font.Height = -13 Font.Name = 'Arial' Font.Style = [] MaxLength = 15 ParentFont = False TabOrder = 1 end object EditCommon_Name: TDBEdit Left = 8 Top = 68 Width = 210 Height = 24 Color = clSilver DataField = 'Common_Name' DataSource = DataSource1 Font.Color = clWhite Font.Height = -13 Font.Name = 'Arial' Font.Style = [] MaxLength = 30 ParentFont = False TabOrder = 2 end object EditSpeciesName: TDBEdit Left = 8 Top = 112 Width = 280 Height = 24 Color = clSilver DataField = 'Species Name' DataSource = DataSource1 Font.Color = clWhite Font.Height = -13 Font.Name = 'Arial' Font.Style = [] MaxLength = 40 ParentFont = False TabOrder = 3 end object EditLengthcm: TDBEdit Left = 8 Top = 156 Width = 70 Height = 24 Color = clSilver DataField = 'Length (cm)' DataSource = DataSource1 Font.Color = clWhite Font.Height = -13 Font.Name = 'Arial' Font.Style = [] MaxLength = 0 ParentFont = False TabOrder = 4 end object EditLength_In: TDBEdit Left = 90 Top = 156 Width = 143 Height = 24 Color = clSilver DataField = 'Length_In' DataSource = DataSource1 Font.Color = clWhite Font.Height = -13 Font.Name = 'Arial' Font.Style = [] MaxLength = 0 ParentFont = False TabOrder = 5 end object DBImage1: TDBImage Left = 304 Top = 8 Width = 273 Height = 177 DataField = 'Graphic' DataSource = DataSource1 TabOrder = 6 end object DBMemo1: TDBMemo Left = 8 Top = 196 Width = 569 Height = 173 Color = clWhite DataField = 'Notes' DataSource = DataSource1 Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 7 end end end object DataSource1: TDataSource DataSet = Table1 Left = 287 Top = 5 end object Table1: TTable Active = True DatabaseName = 'DBDEMOS' TableName = 'biolife.db' Left = 260 Top = 5 object Table1SpeciesNo: TFloatField FieldName = 'Species No' end object Table1Category: TStringField FieldName = 'Category' Size = 15 end object Table1Common_Name: TStringField FieldName = 'Common_Name' Size = 30 end object Table1SpeciesName: TStringField FieldName = 'Species Name' Size = 40 end object Table1Lengthcm: TFloatField FieldName = 'Length (cm)' end object Table1Length_In: TFloatField FieldName = 'Length_In' DisplayFormat = '#####' end object Table1Notes: TMemoField FieldName = 'Notes' Size = 50 end object Table1Graphic: TGraphicField FieldName = 'Graphic' end end object DBPrintWin1: TDBPrintWin About = 'Version 5.32' AboutRegistered = 'TOM SNIDER' HeaderFont.Color = clWindowText HeaderFont.Height = 16 HeaderFont.Name = 'Arial' HeaderFont.Style = [] Font.Color = clWindowText Font.Height = 16 Font.Name = 'Arial' Font.Style = [] FooterFont.Color = clWindowText FooterFont.Height = 12 FooterFont.Name = 'Arial' FooterFont.Style = [] FrameObjects = True clBtnFaceAsWhite = True OutputTo = poViewer Orientation = Default Units = poInches ViewButtonVisible = False ShowCancelDialog = True LineWidth = 0 Copies = 1 GridBackDrop = False GridBackDropUnits = poInches ZoomPercentage = 25.000000000000000000 HeaderTop = 0.500000000000000000 HeaderLeft = 0.500000000000000000 HeaderStringLeft = ' ' HeaderStringCenter = ' ' HeaderStringRight = ' ' HeaderEnabled = True HeaderOutlined = False HeaderFilled = False TextColor = clBlack ViewBkColor = 11234567 ViewHeading = 'Printit Viewer' HeadingColor = clSilver FrameStyle = frThin FooterTop = 10.170000000000000000 FooterString = ' ' FooterEnabled = True FooterOutlined = False FooterFilled = False FixSansSerif = True FooterStringLeft = 'Printed on @Date at @Time' FooterStringRight = 'Page @Page' BorderLeft = 0.500000000000000000 BorderRight = 0.500000000000000000 LineSpacing = 2.800000000000000000 Left = 336 Top = 8 end end